home *** CD-ROM | disk | FTP | other *** search
/ CD-ROM Today - The Disc! 5 / CD-ROM Today - The Disc (Issue 5)(November 1994).ISO / mac / Mac shareware / Education / RLaB / examples / factest.r < prev    next >
Text File  |  1994-09-21  |  152b  |  13 lines
  1. factest = function ( n )
  2. {
  3.   local( i , x );
  4.   i = 0; x = 50;
  5.   while( i < n )
  6.   {
  7.     fac( x );
  8.     i++;
  9.   }
  10.   printf("factest done, n = %i\n", n);
  11. }
  12.  
  13.